home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Source Code / C / Applications / Moscow ML 1.42 / src / mosmllib / test / cmdline.sml < prev    next >
Encoding:
Text File  |  1997-08-18  |  216 b   |  7 lines  |  [TEXT/R*ch]
  1. (* test/cmdline.sml, PS 1997-03-07 *)
  2.  
  3. val _ = 
  4.     (app print ["This program is invoked as `", CommandLine.name(), "'\n",
  5.         "with arguments:\n"];
  6.      app (fn a => (print a; print "\n")) (CommandLine.arguments ()))
  7.